function Link_delay = GetLinksDelay(delay)
  number_of_links = 111;
  Link_delay=zeros(number_of_links,3);

  for index=1:1:number_of_links
    Link_delay(index,1)=delay(index,1);% sender id
    Link_delay(index,2)=delay(index,2);% receiver id
    non_zero_values = delay (index, find (delay (index, :) > 0));
    [m,n] = size(non_zero_values);
    columns = 3:1:n; % remove the sender id and receiver id when compute the mean of delay
    Link_delay(index,3)=mean (non_zero_values(1,columns));
  end
  %return Link_delay;
end
